Imports System.Data.OleDb

Public Class AbstractDAO

    Public Shared Function ConnectionData() As OleDb.OleDbConnection
        Dim chuoi_ket_noi As String
        chuoi_ket_noi = "Provider = Microsoft.Jet.OLEDB.4.0; Data source = QLKS.mdb"
        Dim ket_noi As New OleDb.OleDbConnection(chuoi_ket_noi)
        ket_noi.Open()
        Return ket_noi
    End Function

End Class
